macro mcall dest
	.db <call, >(dest-1), <(dest-1)
endm

macro mcallasm dest
	.db <callasm, >(dest), <(dest)
endm

macro mdouble val
	.db <twolit, >val, <val
endm

macro mnext label
	.db <next, (label)-($)+1
endm

macro mif label
	.db <iff, (label)-$
endm

macro mnif label
	.db <nif, (label)-$
endm
